-- background: 4760 from stack: in.0a5
-- bmap block id: 4949
-- flags: 4000
-- background id: 0
-- name: 
----- HyperTalk script -----
on openBackground
  hide menubar
  push recent card
end openBackground


-- part 4 (field)
-- low flags: 00
-- high flags: 0007
-- rect: left=14 top=33 right=270 bottom=488
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 0
-- font id: 3
-- text size: 9
-- style flags: 0
-- line height: 12
-- part name: Clipping


-- part 12 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=385 top=271 right=288 bottom=412
-- title width / last selected line: 0
-- icon id / first selected line: 20689 / 20689
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Home
----- HyperTalk script -----
on mouseUp
  visual effect iris open
  go Home
end mouseUp



-- part 14 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=14 top=272 right=288 bottom=68
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Clear
----- HyperTalk script -----
on mouseUp
  global clippingStr
  answer "Clear your clippings?:" with "Clear" or "Cancel"
  if it = "Cancel" then exit mouseUp
  put empty into clippingStr
  put empty into field clipping
end mouseUp



-- part 15 (button)
-- low flags: 00
-- high flags: A000
-- rect: left=71 top=272 right=288 bottom=125
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Text
----- HyperTalk script -----
on mouseUp
  global clippingStr
  put field clipping into clippingStr
  ask "Filename for output"
  put ":" & it into fileStr
  open file fileStr
  write clippingStr to file fileStr
  close file fileStr
end mouseUp



-- part 16 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=466 top=271 right=288 bottom=494
-- title width / last selected line: 0
-- icon id / first selected line: 6720 / 6720
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Return
----- HyperTalk script -----
on mouseUp
  visual effect iris close
  pop card
end mouseUp



-- part 17 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=411 top=271 right=288 bottom=439
-- title width / last selected line: 0
-- icon id / first selected line: 15420 / 15420
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Prev
----- HyperTalk script -----
on mouseUp
  visual effect wipe right
  go to previous card
end mouseUp



-- part 18 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=440 top=271 right=288 bottom=464
-- title width / last selected line: 0
-- icon id / first selected line: 16560 / 16560
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Next
----- HyperTalk script -----
on mouseUp
  visual effect wipe left
  go to next card
end mouseUp



-- part 22 (button)
-- low flags: 00
-- high flags: 0000
-- rect: left=136 top=271 right=293 bottom=162
-- title width / last selected line: 0
-- icon id / first selected line: 19678 / 19678
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: 
----- HyperTalk script -----
on mouseUp
  set visible of card field "about clipping" to true
end mouseUp



-- part 23 (button)
-- low flags: 00
-- high flags: A001
-- rect: left=341 top=272 right=288 bottom=380
-- title width / last selected line: 0
-- icon id / first selected line: 0 / 0
-- text alignment: 1
-- font id: 0
-- text size: 12
-- style flags: 0
-- line height: 16
-- part name: Zap
----- HyperTalk script -----
on mouseUp
  answer "Delete this card?:" with "Delete" or "Cancel"
  domenu "delete card"
end mouseUp